home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Apple Reference & Presen…rary 5 (Internal Edition)
/
Apple R&P Lib Internal v5.0.iso
/
6-Developer Demos
/
Developer Demos-Ed.
/
Macintosh School® CD-ROM Demo
/
Macintosh SchoolÆ CD-ROM Demo
/
card_85005.txt
< prev
next >
Wrap
Text File
|
1990-08-14
|
5KB
|
240 lines
-- card: 85005 from stack: in
-- bmap block id: 85460
-- flags: 4000
-- background id: 69011
-- name: Today's Attendance…
----- HyperTalk script -----
on openCard
global buttonName, buttonList, buttonID
put 2 into buttonID
put the long date into field date
set hilite of background button id buttonName to false
repeat with index = 1 to the number of lines of buttonList
set hilite of background button id line index of buttonList to false
end repeat
end openCard
on closeCard
global buttonName, buttonList, buttonID
set hilite of button id buttonID to false
set hilite of button id 2 to true
set hilite of background button id buttonName to true
repeat with index = 1 to the number of lines of buttonList
set hilite of background button id line index of buttonList to true
end repeat
end closeCard
on mouseUp
global buttonID
if id of target is not buttonID then
set hilite of button id buttonID to false
set hilite of target to true
put id of target into buttonID
end if
end mouseUp
-- part 1 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=0 top=0 right=342 bottom=512
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
-- part 2 (button)
-- low flags: 00
-- high flags: C006
-- rect: left=144 top=121 right=137 bottom=359
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Teacher’s report (homeroom)
-- part 3 (button)
-- low flags: 00
-- high flags: 8006
-- rect: left=144 top=137 right=153 bottom=359
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Teacher’s report (alphabetic)
-- part 4 (button)
-- low flags: 00
-- high flags: 8006
-- rect: left=144 top=153 right=169 bottom=359
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Absent student’s ph. # list
-- part 5 (button)
-- low flags: 00
-- high flags: 8006
-- rect: left=144 top=169 right=185 bottom=359
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Daily attendance list
-- part 6 (button)
-- low flags: 00
-- high flags: 8006
-- rect: left=144 top=185 right=201 bottom=359
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Daily List with comments
-- part 7 (button)
-- low flags: 00
-- high flags: 8006
-- rect: left=144 top=201 right=217 bottom=359
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Today’s statistics
-- part 8 (button)
-- low flags: 00
-- high flags: 2006
-- rect: left=144 top=217 right=233 bottom=359
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Today’s birthdays
-- part 9 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=165 top=287 right=305 bottom=223
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Print
----- HyperTalk script -----
on mouseUp
global buttonID
lock screen
go to card short name of button id buttonID of this background
unlock screen
end mouseUp
-- part 10 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=277 top=287 right=305 bottom=335
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Cancel
----- HyperTalk script -----
on mouseUp
lock screen
pop card
unlock screen
end mouseUp
-- part contents for background part 28
----- text -----
Abrosimoff, Mich…
Adams, Bryan
Alexander, Rick
Alexander, Susan
Allsop, Blair M.
Azimov, Isaac
Barisoff, Larissa
Bunyan, Paul
Burnyeat, Grant
Caldwell, Brian
-- part contents for background part 29
----- text -----
47
80
53
54
52
102
48
13
94
93
-- part contents for background part 30
----- text -----
Present
Present
Present
Present
Present
Present
Present
Present
Present
Present
-- part contents for background part 33
----- text -----
0 students selected
-- part contents for background part 31
----- text -----
Monday, September 4, 1989